home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / dbase / do1beta.zip / CIRCLE.DO < prev    next >
Text File  |  1991-07-18  |  207b  |  11 lines
  1. /*
  2.     draw some circles
  3. */
  4. #include "bgidef.do"
  5.  
  6. initGraph(DETECT,0,envSymbol("bgipath"));
  7. for(i=50;i<300;i=i+10) circle(i,i,i-50);
  8. outText("Press any key to continue...");
  9. readchar();
  10. closeGraph();
  11.